package com.deep.product.service.impl;

import com.alibaba.fastjson.JSON;
import com.alibaba.fastjson.TypeReference;
import com.baomidou.mybatisplus.core.conditions.query.QueryWrapper;
import com.baomidou.mybatisplus.core.metadata.IPage;
import com.baomidou.mybatisplus.extension.service.impl.ServiceImpl;
import com.deep.common.utils.PageUtils;
import com.deep.common.utils.Query;
import com.deep.product.dao.CategoryDao;
import com.deep.product.model.entity.CategoryEntity;
import com.deep.product.model.vo.Catalog2VO;
import com.deep.product.service.CategoryBrandRelationService;
import com.deep.product.service.CategoryService;
import org.springframework.beans.factory.annotation.Autowired;
import org.springframework.cache.annotation.CacheEvict;
import org.springframework.cache.annotation.Cacheable;
import org.springframework.data.redis.core.StringRedisTemplate;
import org.springframework.stereotype.Service;
import org.springframework.transaction.annotation.Transactional;
import org.springframework.util.Assert;
import org.springframework.util.StringUtils;

import java.util.*;
import java.util.concurrent.TimeUnit;
import java.util.stream.Collectors;


@Service("categoryService")
public class CategoryServiceImpl extends ServiceImpl<CategoryDao, CategoryEntity> implements CategoryService {

    @Autowired
    private CategoryDao categoryDao;    // CategoryDao继承了baseMapper

    @Autowired
    private CategoryBrandRelationService categoryBrandRelationService;

    @Autowired
    private StringRedisTemplate redisTemplate;

//    @Autowired
//    private RedissonClient redisson;

    @Override
    public PageUtils queryPage(Map<String, Object> params) {
        IPage<CategoryEntity> page = this.page(
                new Query<CategoryEntity>().getPage(params),
                new QueryWrapper<CategoryEntity>()
        );

        return new PageUtils(page);
    }

    @Override
    public List<CategoryEntity> listWithTree() {
        // 查询所有分类
        List<CategoryEntity> entityList = categoryDao.selectList(null);
        // 移除showStatus为0的品牌
        Iterator<CategoryEntity> iterator = entityList.iterator();      // 不能用forEach循环移除List元素，可参考 https://blog.csdn.net/w605283073/article/details/103108761
        while (iterator.hasNext()) {
            CategoryEntity entity = iterator.next();
            if (entity.getShowStatus() == 0) {
                iterator.remove();
            }
        }
        // 组装成树形结构
        List<CategoryEntity> entitiesTree = entityList.stream()
                .filter((entity) -> entity.getParentCid() == 0)     // 过滤条件(一级菜单)
                .map((entity) -> {                                  // 设置子商品
                    entity.setChildren(getChildren(entity, entityList));
                    return entity;
                })
                .sorted((entity1, entity2) -> {                     // 对每一层级进行排序
                    return (entity1.getSort() == null ? 0 : entity1.getSort()) - (entity2 == null ? 0 : entity2.getSort());
                })
                .collect(Collectors.toList());                      // 收集为List集合
        return entitiesTree;
    }

    @Override
    public void logicDelete(Long catId) {
        Assert.notNull(catId, "catId must not null!");
        categoryDao.logicUpdate(catId);
    }

    @Override
    public Long[] findCatalogPath(Long catalogId) {
        List<Long> path = new ArrayList<>();
        findParentPath(path, catalogId);

        Collections.reverse(path);

        return path.toArray(new Long[path.size()]);
    }

    //    @Caching(evict = {      // 删除以下缓存
//            @CacheEvict(value = "category", key = "'getCatalogJson'"),
//            @CacheEvict(value = "category", key = "'getLevel'")
//    })
    @CacheEvict(value = "category", allEntries = true)  // 删除category分区内所有缓存
    @Transactional
    @Override
    public void updateDetail(CategoryEntity entity) {
        // 更新自己表
        this.updateById(entity);
        // 品牌名发生了变化
        if (StringUtils.hasLength(entity.getName())) {
            // 更新冗余表
            categoryBrandRelationService.updateCategoryName(entity.getCatId(), entity.getName());
        }
    }

    @Cacheable(value = {"category"}, key = "#root.methodName")  // 将当前方法结果缓存。如果缓存有，从缓存中读取，方法不调用；缓存没有将调用方法并缓存。
    @Override
    public List<CategoryEntity> getLevel(Long p_id, Long cat_id) {
        List<CategoryEntity> entities = this.list(
                new QueryWrapper<CategoryEntity>().eq("parent_cid", p_id).eq("cat_level", cat_id)
        );
        return entities;
    }

    /**
     * Redisson分布式锁
     *
     * @return 分类
     */
//    private Map<String, List<Catalog2VO>> getCatalogFromDdWithRedisson() {
//        RLock lock = redisson.getLock("catalogJson-lock");
//        try {
//            lock.lock();
//            return getCatalogFromDB();
//        } finally {
//            lock.unlock();
//        }
//    }

    /**
     * 分布式锁
     *
     * @return 分类
     */
//    private Map<String, List<Catalog2VO>> getCatalogFromDbWithRedisLock() throws InterruptedException {
//        // 缓存击穿（查数据库时加锁）
//        // 30秒后自动删锁（防止机器宕机不能手动释放,从而产生死锁）
//        String value = "lockJson" + UUID.randomUUID();
//        // 原子操作加锁
//        Boolean lock = redisTemplate.opsForValue()
//                .setIfAbsent("lock", value, 30, TimeUnit.SECONDS);
//        if (lock) {
//            Map<String, List<Catalog2VO>> fromDB;
//            try {
//                // 加锁成功
//                fromDB = getCatalogFromDB();
//            } finally {
//                // 解锁也必须是原子操作 Lua脚本操作 解锁成功返回1 否则返回0
//                String script = "if redis.call('get',KEYS[1]) == ARGV[1] then return redis.call('del',KEYS[1]) else return 0 end";
//                DefaultRedisScript<Long> redisScript = new DefaultRedisScript<>(script, Long.class);
//                // 执行解锁
//                redisTemplate.execute(redisScript, Arrays.asList("lock"), value);
///*                // 判断是否为自己的锁（即判断从redis中获取的锁中的值是否和自己加锁时一致）
//                String valueFromRedis = redisTemplate.opsForValue().get("lock");
//                if (ObjectUtils.nullSafeEquals(value, valueFromRedis)) {
//                    redisTemplate.delete("lock");
//                }*/
//            }
//            return fromDB;
//        }
//        // 重试加锁
//        Thread.sleep(200);
//        return getCatalogFromDbWithRedisLock();
//    }

//    private Map<String, List<Catalog2VO>> getCatalogFromDdWithSyn() {
//        // 缓存击穿（查数据库时加锁）
//        // synchronized (this),锁住当前实例,如果SpringBoot所有的组件在容器中都是单例的就没问题
//        synchronized (this) {
//            // 得到锁再次确认缓存为空
//            String catalogJson = redisTemplate.opsForValue().get("catalogJson");
//            if (StringUtils.hasLength(catalogJson)) {
//                // 缓存不为空
//                Map<String, List<Catalog2VO>> fromRedis =
//                        JSON.parseObject(catalogJson, new TypeReference<Map<String, List<Catalog2VO>>>() {
//                        });   // 因为TypeReference构造器是受保护的，还得创建一个类去实现它，因此简单起见使用匿名内部类
//                return fromRedis;
//
//            } else {
//                // 缓存为空-->查询数据库
//                return getCatalogFromDB();
//            }
//        }
//    }
    private Map<String, List<Catalog2VO>> getCatalogFromDB() {
        // 缓存为空-->查询数据库
        List<CategoryEntity> entityList = baseMapper.selectList(null);
        // 查询所有一级分类
        List<CategoryEntity> level1 = getCategoryEntities(entityList, 0L);

        Map<String, List<Catalog2VO>> parent_cid = level1.stream().collect(Collectors.toMap(
                k -> k.getCatId().toString(),
                v -> {
                    // 拿到每一个一级分类 然后查询他们的二级分类
                    List<CategoryEntity> entities = getCategoryEntities(entityList, v.getCatId());
                    List<Catalog2VO> catalog2VOS = null;
                    if (entities != null) {
                        catalog2VOS = entities.stream().map(l2 -> {
                            Catalog2VO catalog2VO =
                                    new Catalog2VO(v.getCatId().toString(), l2.getCatId().toString(), l2.getName(), null);
                            // 找当前二级分类的三级分类
                            List<CategoryEntity> level3 = getCategoryEntities(entityList, l2.getCatId());
                            // 三级分类有数据的情况下
                            if (level3 != null) {
                                List<Catalog2VO.Catalog3VO> catalog3Vos = level3
                                        .stream().map(l3 ->
                                                new Catalog2VO.Catalog3VO(l3.getCatId().toString(), l2.getCatId().toString(), l3.getName()))
                                        .collect(Collectors.toList());
                                catalog2VO.setCatalog3List(catalog3Vos);
                            }
                            return catalog2VO;
                        }).collect(Collectors.toList());
                    }
                    return catalog2VOS;
                }));
        // 进行缓存
        redisTemplate.opsForValue().set("catalogJson", JSON.toJSONString(parent_cid), 1, TimeUnit.DAYS);
        return parent_cid;
    }

    @Cacheable(value = {"category"}, key = "#root.methodName")  // 将当前方法结果缓存。如果缓存有，从缓存中读取，方法不调用；缓存没有将调用方法并缓存。
    @Override
    public Map<String, List<Catalog2VO>> getCatalogJson() {
        // 问题（解决方案）：缓存穿透(空结果返回)、缓存雪崩（不同的key设置随机过期时间）、缓存击穿（查数据库时加锁）
        String catalogJson = redisTemplate.opsForValue().get("catalogJson");
        if (!StringUtils.hasLength(catalogJson)) {
            return getCatalogFromDB();
        }
        Map<String, List<Catalog2VO>> fromRedis =
                JSON.parseObject(catalogJson, new TypeReference<Map<String, List<Catalog2VO>>>() {
                });   // 因为TypeReference构造器是受保护的，还得创建一个类去实现它，因此简单起见使用匿名内部类
        return fromRedis;
    }

    /**
     * 第一次查询的所有 CategoryEntity 然后根据 parent_cid去这里找
     */
    private List<CategoryEntity> getCategoryEntities(List<CategoryEntity> entityList, Long parent_cid) {
        return entityList.stream().filter(item
                -> item.getParentCid() == parent_cid).collect(Collectors.toList());
    }

    /**
     * 递归查找父节点
     *
     * @param path      收集父节点的集合
     * @param catalogId 当前节点
     */
    private void findParentPath(List<Long> path, Long catalogId) {
        // 收集当前节点id
        path.add(catalogId);
        // 获取当前节点实体类
        CategoryEntity entity = getById(catalogId);
        // 判断当前节点是否还有父节点
        if (entity.getParentCid() != 0) {     // 有父节点
            findParentPath(path, entity.getParentCid());
        }
    }

    /**
     * 设置子商品（递归设置子菜单）
     *
     * @param cur      当前商品实体
     * @param entities 所有商品
     * @return 子商品实体集合
     */
    private List<CategoryEntity> getChildren(CategoryEntity cur, List<CategoryEntity> entities) {
        List<CategoryEntity> children = entities.stream()
                .filter((entity) -> cur.getCatId() == entity.getParentCid())   // 当前id为子类pid则说明，该实体类为子实体类父类
                .map(entity -> {
                    entity.setChildren(getChildren(entity, entities));   // 递归设置子菜单
                    return entity;
                })
                .sorted((entity1, entity2) -> {                                 // 对每一层级进行排序
                    return (entity1.getSort() == null ? 0 : entity1.getSort()) - (entity2 == null ? 0 : entity2.getSort());
                })
                .collect(Collectors.toList());

        return children;
    }

}